***************************************************************************
* Code to produce Figure E.1
***************************************************************************
clear all
set more off, permanent

cd "YOUR_DIRECTORY\Replication\1_Data"

use Aerial_Photo_Freq.dta, clear

histogram date2, ///
ytitle("Number of Photos in the Dataset") ///
xtitle("Date") ///
discrete frequency fcolor(midblue) lcolor(none) ///
plotregion(fcolor(white) lcolor(white)) ///
graphregion(fcolor(white) lcolor(white))